Amiga Tools 3

home *** CD-ROM | disk | FTP | other *** search

/ Amiga Tools 3 / Amiga Tools 3.iso / terminal / avmsuite(fax) / source / playdate.avmsrc < prev next >

Wrap

Text File | 1994-06-24 | 6.3 KB | 339 lines

startrecord=true label=playdate nodetype=14 comment=We're going to play the month and day nextactiontype=3 nextactionaction= endrecord=true startrecord=true label= nodetype=8 line1=procedure line2=parse arg actualDate line3= line4= line5= line6= line7= line8= line9= line10= nextactiontype=3 nextactionaction= endrecord=true startrecord=true label= nodetype=8 line1=dateformat = getclip('AVMDateFormat') line2=if dateformat = "" then dateformat = "%month %day" line3=else if upper(dateformat) = "NONE" then dateformat = "" line4= line5= line6= line7= line8= line9= line10= nextactiontype=3 nextactionaction= endrecord=true startrecord=true label= nodetype=8 line1=do i = 1 to words(dateformat) line2= if upper(word(dateformat, i)) = "%MONTH" then line3= call playnumbranch('playdate' || substr(actualDate, 5, 2)) line4= else if upper(word(dateformat, i)) = "%DAY" then line5= call playddnumber(substr(actualDate, 7, 2)) line6= else line7= call playddvoice(word(dateformat, i)) line8=end line9= line10= nextactiontype=3 nextactionaction= endrecord=true startrecord=true label= nodetype=14 comment=We're done nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playddvoice nodetype=8 line1=procedure line2=parse arg filename line3= line4= line5= line6= line7= line8= line9= line10= nextactiontype=3 nextactionaction= endrecord=true startrecord=true label= nodetype=1 filename=filename comment= keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate01 nodetype=1 filename='avm:voices/monthjanuary' comment=January keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate02 nodetype=1 filename='avm:voices/monthfebruary' comment=February keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate03 nodetype=1 filename='avm:voices/monthmarch' comment=March keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate04 nodetype=1 filename='avm:voices/monthapril' comment=April keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate05 nodetype=1 filename='avm:voices/monthmay' comment=May keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate06 nodetype=1 filename='avm:voices/monthjune' comment=June keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate07 nodetype=1 filename='avm:voices/monthjuly' comment=July keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate08 nodetype=1 filename='avm:voices/monthaugust' comment=August keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate09 nodetype=1 filename='avm:voices/monthseptember' comment=September keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate10 nodetype=1 filename='avm:voices/monthoctober' comment=October keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate11 nodetype=1 filename='avm:voices/monthnovember' comment=November keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true startrecord=true label=playdate12 nodetype=1 filename='avm:voices/monthdecember' comment=December keyactiontype=3 keyactionaction= faxactiontype=0 faxactionaction=stdfax dataactiontype=0 dataactionaction=stddata busyactiontype=0 busyactionaction=stdbusy abortactiontype=0 abortactionaction=stdabort erroractiontype=0 erroractionaction=stderror nextactiontype=2 nextactionaction=return endrecord=true